﻿Imports System.Configuration.Provider




Public Class PictureProviderCollection
    Inherits ProviderCollection


    Public Overrides Sub Add(ByVal provider As System.Configuration.Provider.ProviderBase)

        If provider Is Nothing Then Throw New ArgumentNullException("The provider parameter cannot be null.")

        If Not (TypeOf provider Is PictureProvider) Then Throw New ArgumentException("The provider parameter must be of type PictureProvider.")

        MyBase.Add(provider)

    End Sub



    Default Public Shadows ReadOnly Property Item(ByVal name As String) As PictureProvider
        Get
            Return DirectCast(MyBase.Item(name), PictureProvider)
        End Get
    End Property

    Public Overloads Sub CopyTo(ByVal array As PictureProvider(), ByVal index As Integer)
        MyBase.CopyTo(array, index)
    End Sub


End Class
